`Ln!FkX  z v㥀 ̠łŃvЯp q z zL<   Dl      `  `8`   yyPwx1R@ w x  Y"y     y`v8`z8`)#D`)L/#`L3#+#*#.#-#`LO#+#*#` (c)1983 Action Computer Services  B JKIHiDiELV`L# # BLV`)L##l L# &` Fj`8冨凪` '$EӅӥ '$`ʆǪƩ Ɛee` 8$ƦʆǢ &Ɛeǐ \$ \$L#$ 8$'&&&8儨児祂*L#$&&*ń8&&L#$ $`hihiHHȱȱL#c !#3`L#JJJJ`H #h`Hȩh #LI% #LI% }#LI% #LI% #H8`HhHh %LI% BHI V䅠LI% L% #LI%Ԇ ؠPIPP` #&P #LI% E&L & #&LJ& ^&L&H- &8塪墨hL^& w&L & ~&L& #&ȹP`텠8堨塪 #&芨Oȩ-`PP %P棩 Ѥģ0-ģ6000:,80H & &ehe&eģ0ʥ 8堅塅`$ &&*i0:0i &Ʀ`¢ 护°ڱ%ȱ%E &L'担CS %L'I w&L'H r'L' E&L' &B V I%NLMȑ` MLN%B VLI% ~$`ȱ`` }(ȥ`HhƣĢ`ƥĤ`Ѣ )`ȱѢĦ`膡``ťƤe8夰L) Ƥ8`ŦeѠe桊L")i!)9)rODzrRETURNmrfrPROC AllocBit(CARD sect)GrCARD blk8rBYTE offset r4BYTE ARRAY mask(8)=[$7F $BF $DF $EF $F7 $FB $FD $FE]qqIF sect=0 THENq blk=0q ELSEq blk=sect/8qFIqH!FE-blk*8) tqFatmap(blk)==L* %*1**IRL*@L**** **ͽ***L+`* *  Y`Y mask(L=+ %3+6+5+8+7+4+3+R *9+9+`;IF secLw+ %m+p+o+r+q+n+m+W *s+s+`L+**nͶ**L+L+#Ǻ Directory has %U entries%E**+ '`L+} &L, FATCHECK v1.1, %LI,! By J. Williams,' % &`LW,Lj,Enter drive #: ,Z % &**L,* LW,`oL,,,, ,L,,,L,,, $,,,, ~$8,宍,)m,)m,,=,`ffset)@ L"---- -L>---LW--- $---- ~$8-宍-*m-*m--=---` $20 $@ L---- -L---L--- $---- ~$8-宍-)m-)m--=---`bL+.&.%.*%.*&.L.&.%. -'.'.Ld.&.%. ,L.L.FAT error, sector %H in use%E&.%..g '**L.L.Sector %U does not exist%E&.%.. '` ;Go see L.)...Ȍ.).......... :+....L3.i ..i...**L/First dir map is sector %U%E**/d '.i..i...**L/Disk has %U sectors%E**/ 'ʹ**L0L0#Ǻ Sector count exceeds 65534/ %LE0$This program cannot handle that many0 %Lr0"sectors. Only sectors 0-65534 will0O %L0 checked, so discrepancies may be0| %L0erroneously reported.0 %L0ΧԠŠŠТ0 %**.i..i.......*....ȱ**.i..i.......L1Ȍ**L1Double Density detected1v %L1**L1Single Density detected1 %** $.....** ~$......L1.*..M*L$3LM2%Bitmap length error. Boot sector says2' %L|2$there are %U bitmap sectors. Based%E..2W 'L2 on the total sector count, there2 %....*L2'should be %U bitmap sectors, which is%E..2 'L3what will be assumed.3 %L_3.*.LP3There are %U bitmap sectors%E..32 'L~3The first bitmap is sector 3b %** V&L3L3Error reading boot sector3 %...`L333c͢*L 4L4#Max of 100 dirs reached. Entry lost3 %`L04* m**(m*33*`+1L648***LV42414Ȍ*Lw4* m**(m*24142414`tsgIFL4 %444444444L#544L#54444)4͌4L44i44i44i44i484444L44i44i484444444ͨ*4*L5**44 $44L5%Compressing this directory would free5v %L5 %U sectors%E445 '`will be assL555L5"First directory map sector is %H%E555 '*5*555 (.*55*55 :+55L6Lk6I/O error reading map sector6N %L6Sector=%H,error=%U%E5556u '55`**55*5*5555** $8775L28y5 m**(m*5555L,8*55*55 :+555 (.5L7L7I/O error reading data sector7l %L7Sector=%H,error=%U%E5557 '55`5m*55m*55m*55m*555 L,8L8Directory is too long8 %55`5L655555 5L 6` dirptr,CLZ8***O8*N8N8iN8O8iO8N8O8ȱQ8P88P8P8Q8Q8*O8*N8N8iN8O8iO8Q8P8O8N8 4P8Q8L9P8Q8L9N8O8V8V8)(V8V8I(L_9O8S8N8R8N8O8N8O8ȱU8T8U8T8 3 +S8O8R8N8**8P8P8Q8Q8N8iN8O8iO8L8` DenL999999999 (.*99*99 :+9͇9L4:L9!I/O error reading file map sector9 %L:Sector=%H,error=%U%E999: '`9** $8c:c:͈9L:@9 m9*(m999ͅ99L:99 (.9LX:99999 9L9`di9 ,adr,nexL::::T::i::i::Ȍ::L-;:::::::L;: %`ectorsYvLA;=;T<;*6;*5;Lq;Current directory is: ;Z %6;5; : &5;i5;6;i6;5;6;:;9;*6;*5;89;9;:;:;5;i5;6;i6;9;:;L<9;:;L<5;6;;;;;)(;;;;ILc(<< -<<< -<<L>Ͱ<L>**Select one of the options below>w %L> 1 - Rewrite bitmap> %L># 2 - Exit without rewriting bitmap> % &L>Select:> % &<; 34@@@ @LiA <@@@@*A*AA͎@A@LA @@ -@͖@LA@@@@LA*ILCL%BUpdating free sector countB %)@@@@ :+@@LB)@@@i @@i@@@@@@@ t+@c͖@LBLBError rewriting boot sectorB %LCLBError reading boot sectorB %L&C!There should be %U free sectors%E@@C '`YL;C*********7C6C6C 7CLC)m6C)m7C6C7CL_C`LC 0# 8C + T,ͣ*LD @* *LCLCNo errors detectedC %LDLC#There were %U FAT errors detected%E**C 'L0DThere were %U subdirectories%E**D 'LXDThere were %U files%E**DB 'LDProcessing complete.Dj % L#``Cdirectories%E*